home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Source Code / Visual Basic Source Code.iso / vbsource / vbeyes10 / eyes.bas < prev    next >
Encoding:
BASIC Source File  |  1995-10-23  |  470 b   |  21 lines
  1. ' Declare Cursor Structure
  2. Type lpoint
  3.     x As Integer
  4.     y As Integer
  5. End Type
  6.  
  7. 'Declare Window Dimensions Structure
  8. Type lrect
  9.     left As Integer
  10.     top As Integer
  11.     right As Integer
  12.     bottom As Integer
  13. End Type
  14.     
  15. 'Windows API to Find the Current Cursor Position
  16. Declare Sub GetCursorPos Lib "User" (lpPoint As lpoint)
  17.  
  18. 'Windows API to Find the Dimensions of a Window
  19. Declare Sub GetWindowRect Lib "User" (ByVal hWnd%, lpRect As lrect)
  20.  
  21.